home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / wlib11_2.zip / EXAMPLES.EXE / EXAM88.C < prev    next >
C/C++ Source or Header  |  1991-03-13  |  807b  |  36 lines
  1.   #include "window.h"
  2.  
  3.   #define NORM  CREATE_VIDEO_ATTRIBUTE(black,white)
  4.  
  5.   VWPOINTER vw;
  6.   WPOINTER w;
  7.  
  8.   main()
  9.   {
  10.     int i;
  11.     WindowInitializeSystem();
  12.     WindowSaveInitial(0);
  13.     w = WindowInitialize(BORDER,1,1,30,10,NORM,NORM,SINGLEBOX);
  14.     vw = VirtualInitialize(NOATTRIBUTE,10,80,NORM);
  15.     WindowOpen(w);
  16.     WindowAssignToVirtual(w,vw,1,1);
  17.     WindowDisplay(w,1,NOEFFECT);
  18.     /* Freeze Viewport */
  19.     WindowFreeze(w,1);
  20.     for (i=1;i<=10;i++)
  21.     {
  22.       delay(1000);
  23.       VirtualPrintf(vw,"Line %d\n",i);
  24.     }
  25.     /* Unfreeze window */
  26.     WindowFreeze(w,0);
  27.     GET_KEY();
  28.     /* Now try with window always displaying data */
  29.     VirtualClear(vw);
  30.     for (i=1;i<=10;i++)
  31.     {
  32.       delay(1000);
  33.       VirtualPrintf(vw,"Line %d\n",i);
  34.     }
  35.   }
  36.